From: Eric Abrahamsen Date: Sun, 16 May 2021 17:20:43 +0000 (-0700) Subject: Use condition-case-unless-debug in nnselect-run X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18^2~2697 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=0212fb180a118795b4de383cc712e7079c998cef;p=emacs.git Use condition-case-unless-debug in nnselect-run * lisp/gnus/nnselect.el (nnselect-run): This is confusing for users, make it more yielding to common debugging strategies. --- diff --git a/lisp/gnus/nnselect.el b/lisp/gnus/nnselect.el index 5ac4c3a64e1..ecec705b326 100644 --- a/lisp/gnus/nnselect.el +++ b/lisp/gnus/nnselect.el @@ -777,7 +777,7 @@ If this variable is nil, or if the provided function returns nil, Return an article list." (let ((func (alist-get 'nnselect-function specs)) (args (alist-get 'nnselect-args specs))) - (condition-case err + (condition-case-unless-debug err (funcall func args) (error (gnus-error 3 "nnselect-run: %s on %s gave error %s" func args err) []))))